from:"REM" Vol.3  Issue 2     March 84
the newsletter of the
Commodore Users Group of Wichita Inc.
P.O. Box 593, Wichita, Ks. 67201-0593
VIC TIPS   
Submitted by Trevor B. Roydhouse,
NSW, Australia
   No doubt you have noticed that Commodore computers refuse to accept leading spaces when they are returned as part of a response to an INPUT statement.  A simple way to overcome this is to put SHIFTed spaces at the start (and end if required) because shifted spaces are stored as different characters from ordinary spaces and the computer accepts them as part of the string.
A more involved way around this is to print quotes at the beginning of the string that is to be the input.  The advantage of this is that commas, semi-colons, and colons separate statements as well.  Colons and commas are use to separate statements when multiple inputs are requested by the computer and when put as part of an input string or number the program continues but the message EXTRA IGNORED is displayed and the comma and everything after it is ignored.  Using the quotes to start your input string allows the entry of cursor controls, too, which might be handy fo	 some applications.   
   HALF SCREEN REVERSAL for Vic
10 N=832
20 READ D: IF D=-1 THEN 90
30 POKE N,D:N=N+1:GOTO 20
40 DATA 162, 242, 189, 255, 29, 73
50 DATA 128, 157, 255, 29, 202, 208
60 DATA 245, 169, 6, 162, 242, 157
70 DATA 255, 149, 202, 208, 250, 86
80 DATA -1
90 PRINT "CLR" SPC(115) "PRESS A KEY"
100 GET A$: IF A$="" THEN 100
110 SYS 832: GOTO 90
Try changing the "6" in line 60 to "32"
------------
   HALF SCREEN SCROLL for Vic
10 N=832
20 READ D:IF D=-1 THEN 150
30 POKE N,D:N=N+1:GOTO 20
40 DATA	 62, 241, 189, 255, 29, 157
50 DATA 0, 30, 202, 208, 247, 169, 6
60 DATA 162, 241, 157, 255, 149, 202
70 DATA 208, 250, 169, 32, 162, 0, 157
80 DATA 0, 30, 157, 22, 30, 157, 44
90 DATA 30, 157, 44, 30, 157, 66, 30
100 DATA 157, 88, 30, 157, 110, 30
110 DATA 157, 132, 30, 157, 154, 30
120 DATA 157, 176, 30, 157, 198, 30
130 DATA 157, 220, 30, 86
140 DATA -1
150 PRINT "<CLR>"SPC(115) "PRESS A KEY"
160 GET A$: IF A$="" THEN 160
70 SYS 832: GOTO 150
